ErrorLevel("off")
If (ActiveWindow() eq "")
	CallScript("\DiskOnChip\Scripts\powerall.mscr")
ElseIf(ActiveProcess() eq "MainPage.exe")
	CallScript("\DiskOnChip\Scripts\powerall.mscr")
ElseIf(ActiveProcess() eq "SkinzSudoku.exe")
	Kill("SkinzSudoku.exe")
ElseIf(ActiveProcess() eq "Pipes.exe")
	Kill("Pipes.exe")
ElseIf(ActiveProcess() eq "VsNotepad2.exe")
	Kill("VsNotepad2.exe")
ElseIf(ActiveProcess() eq "Aquellaball.exe")
	Kill("Aquellaball.exe")
ElseIf(ActiveProcess() eq "Caisses.exe")
	Kill("Caisses.exe")
ElseIf(ActiveProcess() eq "TangledBugs.exe")
	Kill("TangledBugs.exe")
ElseIf(ActiveProcess() eq "ChainReaction.exe")
	Kill("ChainReaction.exe")
ElseIf(ActiveProcess() eq "Znax.exe")
	Kill("Znax.exe")
ElseIf(ActiveProcess() eq "HexaVirus.exe")
	Kill("HexaVirus.exe")
ElseIf(ActiveProcess() eq "TomTom Navigator.exe")
	SetChoiceEntryFormat(31, 20, "Arial")
	ChoiceDefault("Arret TomTom", "Voulez-vous arręter Tomtom Navigator ? ", 2, 5, "Oui", "Non")
	case 1
	Close("TomTom Navigator")
	case 2
	Exit
	EndChoice
Else
	Close(ActiveWindow())
EndIf
Exit